..$y(24):if $z(24) { .enable #notify | popchng on 24 } | else { .disable #notify | popchng off 24 }
.%dp.25
..$y(25):if $z(25) { .enable #rawecho | popchng on 25 } | else { .disable #rawecho | popchng off 25 }
..-
..Setup...:set %wrecho - $+ $$?="Window to echo to: (a = Active s = Status)" | if (s !isin %wrecho && a !isin %wrecho) { set %wrecho -s }
.%dp.53
..$y(53):if $z(53) { .enable #recent | popchng on 53 } | else { .disable #recent | popchng off 53 }
.%dp.26
..$y(26):if $z(26) { .enable #RECORD | popchng on 26 } | else { .disable #RECORD | popchng off 26 }
.%dp.27
..$y(27):if $z(27) { .enable #SEEN | popchng on 27 } | else { .disable #SEEN | popchng off 27 }
.%dp.56
..$motds(1):set %motds normal | popchng on 56
..$motds(2):set %motds window | popchng on 56
..$motds(3):set %motds changew | popchng on 56
..$motds(4):set %motds changes | popchng on 56
..-
..$motds(5):set %motds hide | popchng off 56
.%dp.28
..$y(28):if $z(28) { .enable #groupSHOOT | popchng on 28 } | else { .disable #groupSHOOT | popchng off 28 }
.%dp.29
..$y(29):if $z(29) { .enable #Sounds | set %sounds On | popchng on 29 } | else { .disable #Sounds | set %sounds Off | popchng off 29 }
.%dp.30
..$y(30):if $z(30) { .enable #usermode | popchng on 30 } | else { .disable #usermode | popchng off 30 }
.%dp.31
..$y(31):if $z(31) { .enable #WALLOPS | if ($server != $null) { umode +w } | popchng on 31 } | else { .disable #WALLOPS | if ($server != $null) { umode -w } | popchng off 31 }
.%dp.32
..$y(32):if $z(32) { .enable #xdcc | popchng on 32 } | else { .disable #xdcc | popchng off 32 }
%pop.prot
.%dp.55 (F4)
..Turn $onoff($group(#max)):if ($group(#max) == off) { set %dp.55 + Max Flood Pro | .enable #MAX | .disable #groupCTCP | ignore -a *!*@* } | else { set %dp.55 - Max Flood Pro | .disable #MAX | .enable #groupCTCP | ignore -r *!*@* }
.-
.%dp.33
..$y(33):if $z(33) { .enable #addpro | set %identpro On | popchng on 33 } | else { .disable #addpro | set %identpro Off | popchng off 33 }
.%dp.34
..$y(34):if $z(34) { set %banprot On | popchng on 34 } | else { set %banprot Off | popchng off 34 }
.%dp.35
..$y(35):if $z(35) { .enable #ctcppro | epopchng on 35 } | else { .disable #ctcppro | popchng off 35 }
..-
..Setup...:set %cfldn $$?="How many CTCPs?... (Now [ [ %cfldn ] $+ ] )" | set %cfldt $div($$?="In how many secs (multiples of [ [ %cfldn ] $+ ] )? (Now [ [ $mpy(%cfldt,%cfldn) ] $+ ] )",%cfldn)
.%dp.36
..$y(36):if $z(36) { .enable #HACKpro | popchng on 36 } | else { .disable #HACKpro | popchng off 36 }
..-
..%dp.sec1
...%dp.49
....$y(49):if $z(49) { set %forcemodesison On | popchng on 49 } | else { set %forcemodesison Off | popchng off 49 }
....-
....Set Modes...:set %forcemodes $remove($remove($$?="Enter modes to force (i.e. tn)",+),-)
...%dp.50
....$y(50):if $z(50) { set %disallowmodesison On | popchng on 50 } | else { set %disallowmodesison Off | popchng off 50 }
....-
....Set Modes...:set %disallowmodes $remove($remove($$?="Enter modes to disallow (i.e. k)",+),-)
...%dp.51
....$y(51):if $z(51) { set %hacktoplevel On | popchng on 51 } | else { set %hacktoplevel Off | popchng off 51 }
...%dp.52
....$y(52):if $z(52) { set %massdeop On | popchng on 52 } | else { set %massdeop Off | popchng off 52 }
....-
....Setup...:set %maxdeops $$?="Max number of deops" | set %maxdeoptime $$?="In how many seconds?"
...-
...%pop.all.on:set %forcemodesison On | set %disallowmodesison On | set %hacktoplevel On | set %massdeop On | popchng on 49-52
...%pop.all.off:set %forcemodesison Off | set %disallowmodesison Off | set %hacktoplevel Off | set %massdeop Off | popchng off 49-52
...-
...Restore Defaults:set %forcemodesison On | set %forcemodes tn | set %disallowmodesison On | set %disallowmodes k | set %hacktoplevel On | set %massdeop On | set %maxdeops 5 | set %deoptime 5 | popchng on 49-52
.%dp.37
..$y(37):if $z(37) { .enable #INVITEfloodpro | popchng on 37 } | else { .disable #INVITEfloodpro | popchng off 37 }
..-
..Setup...:set %invfpn $$?="How many invites?... (Now [ [ %invfpn ] $+ ] )" | set %invfpt $div($$?="In how many secs (multiples of [ [ %invfpn ] $+ ] )? (Now [ [ $mpy(%invfpt,%invfpn) ] $+ ] )",%invfpn
.%dp.39
..$y(39):if $z(39) { .enable #nkfloodpro | popchng on 39 } | else { .disable #nkfloodpro | popchng off 39 }
..-
..Setup...:set %nflnm $$?="How many nick changes?... (Now [ [ %nflnm ] $+ ] )" | set %nfltmn $div($$?="In how many secs (multiples of [ [ %nflnm ] $+ ] )? (Now [ [ $mpy(%nfltmn,%nflnm) ] $+ ] )",%nflnm)
.%dp.38
..$y(38) $+ ...:if $z(38) { set %csmspass $$?="Password" | popchng on 38 } | else { .set %csmspass "" | popchng off 38 }
..-
..Change Pass...:set %csmspass $$?="Password" | popchng on 38
.%dp.textp
..%dp.40
...$y(40):if $z(40) { .enable #floodpro | popchng on 40 } | else { .disable #floodpro | popchng off 40 }
..%dp.41
...$y(41):if $z(41) { .enable #mfloodpro | popchng on 41 } | else { .disable #mfloodpro | popchng off 41 }
..%dp.42
...$y(42):if $z(42) { .enable #nfloodpro | popchng on 42 } | else { .disable #nfloodpro | popchng off 42 }
..-
..Sections
...%dp.43
....$y(43):if $z(43) { set %lengthtfg On | popchng on 43 } | else { set %lengthtfg Off | popchng off 43 }
....-
....Set MAX Length of 1st word...:set %lfowlt $$?="MAX Length of 1st word: (Now [ %lfowlt ] chrs)"
....Set MAX Length of sentence...:set %lfawlt $$?="MAX Length of sentence: (Now [ %lfawlt ] chrs)"
...%dp.44
....$y(44):if $z(44) { set %capskickg On | popchng on 44 } | else { set %capskickg Off | popchng off 44 }
...%dp.45
....$y(45):if $z(45) { set %coltfldg On | popchng on 45 } | else { set %coltfldg Off | popchng off 45 }
....-
....Set MAX Color Codes...:set %clrflt $$?="MAX Color Codes: (Now [ [ %clrflt ] $+ ] )"
...%dp.48
....$y(48):if $z(48) { set %ckickg On | popchng on 48 } | else { set %ckickg Off | popchng off 48 }
....-
....CussWords...:cusswords -l
...%dp.46
....$y(46):if $z(46) { set %rpttg On | popchng on 46 } | else { set %rpttg Off | popchng off 46 }
...%dp.47
....$y(47):if $z(47) { set %chntfldg On | popchng on 47 } | else { set %chntfldg Off | popchng off 47 }
....-
....Setup...:set %cfllns $$?="How many lines?... (Now [ [ %cfllns ] $+ ] )" | set %cfllps $rnd($div($$?="In how many secs (multiples of [ [ %cfllns ] $+ ] )? (Now [ [ $mpy(%cfllps,%cfllns) ] $+ ] )",%cfllns))
.-
.Setup Ban/Ignore time...:set %prtbntm $$?="How long should C-Script ban? (secs)" | set %prtigtm $$?="How long should C-Script ignore? (secs)"
set %forcemodesison On | set %disallowmodesison On | set %hacktoplevel On | set %massdeop On | set %ckickg On | set %wallopsbox on | set %stripper on | set %snoticebox on | set %chanrejoin On | set %sounds On | set %idleaway On | set %ctcpbox On | set %identpro On | set %coltfldg On | set %lengthtfg On | set %rpttg On | set %chntfldg On | set %capskickg On | set %banprot On
popchng on 1-56 | set %aidleaway On | set %motds normal
set %forcemodesison Off | set %disallowmodesison Off | set %hacktoplevel Off | set %massdeop Off | set %ckickg Off | set %wallopsbox off | set %stripper off | set %snoticebox off | set %chanrejoin Off | set %sounds Off | set %idleaway Off | set %ctcpbox Off | set %identpro Off | set %coltfldg Off | set %lengthtfg Off | set %rpttg Off | set %chntfldg Off | set %capskickg Off | set %banprot Off
popchng off 1-56 | set %aidleaway Off | set %motds hide
}
.-
.Restore All Defaults:resetd
-
Commands
.Help... (F1):help
.Edit Notes:run notepad.exe $mircdirnotes.txt
.$ifnreg(Register C-Script!):register
.-
.Clear
..Clear $active $+ :clear
..Clear All Windows:clearall
.Logs
..Log $active $+ :log on $active
..Don't Log $active $+ :log off $active
..-
..Open ?...:run $$dir="Choose A Log:" [ $logdir ]
..-
..Files:run files.txt
.$srv(Quit)
..Delayed...:set %dtqt1 $$?="How many secs before quit:" | set %dtqm1 $$?="Quit Message:" | timer 1 %dtqt1 quit %dtqm1 (Delayed quit after $duration( %dtqt1 ) $+ )
..Now...:quit $$?="Quit Message:"
..Timed...:set %dtqt1 $$?="Quit at What time: (Eg. 21:15, or 9:30)" | set %dtqm1 $$?="Quit Message:" | timer %dtqt1 1 1 quit %dtqm1 (Timed quit at %dtqt1 $+ )
.$srv(Server)
..Links:links
..Stats...:stats $$?="Type A Letter:"
..Scans
...Clone Scan:cscan
...Port Scan:portscan
...Server Scan:sscan $server
...IRCop Scan
....IRCop Scan:ircops $server
....Find ALL IRCops:allircops
.Upload Folder
..View/Run...:.run $$dir="Choose A File:" [ $getdir $+ *.* ]
..Delete...:.remove $$dir="Choose A File:" [ $getdir $+ *.* ]
